﻿Imports System.Data.OleDb

Partial Public Class discussionforum
    Inherits System.Web.UI.Page

    Dim conn = New OleDbConnection(ConfigurationManager.ConnectionStrings("PlacesConnectionString").ToString())

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim locationid = Request.Params("ID")
        Dim conn = New OleDbConnection(ConfigurationManager.ConnectionStrings("PlacesConnectionString").ToString())
        conn.Open()
        Dim sql As String = "SELECT * FROM POSTING" 'WHERE [LocationFKID] = locationid"
        Dim dbcmd = New OleDbCommand(sql, conn)
        'dbcmd.Parameters.AddWithValue("@ID", locationid)
        Dim dbread = dbcmd.ExecuteReader()
        'Repeater1.DataSource = dbread
        'Repeater1.DataBind()
        GridView1.DataBind()

    End Sub

    
End Class